MFPS 2006 



Arrows, like Monads, are Monoids 



Chris Heunen and Bart Jacobs 

Institute for Computing and Information Sciences 
Radboud University, Nijmegen, the Netherlands, 
Email: {c. heunen, b . jacobs}@cs .ru.nl 



Abstract 

Monads are by now well-established as programming construct in functional lan- 
guages. Recently, the notion of "Arrow" was introduced by Hughes as an extension, 
not with one, but with two type parameters. At first, these Arrows may look some- 
what arbitrary. Here we show that they are categorically fairly civilised, by showing 
that they correspond to monoids in suitable subcategories of bifunctors C op xC — > C. 
This shows that, at a suitable level of abstraction, arrows are like monads — which 
are monoids in categories of functors C —* C. 

Freyd categories have been introduced by Power and Robinson to model computa- 
tional effects, well before Hughes' Arrows appeared. It is often claimed (informally) 
that Arrows are simply Freyd categories. We shall make this claim precise by show- 
ing how monoids in categories of bifunctors exactly correspond to Freyd categories. 

Key words: Arrow, Bifunctor, Monad, Monoid, Freyd category. 



1 Introduction 

The main result of this article can be expressed in one sentence: Hughes' 
Arrows are monoids in categories of bifunctors C op x C — > C. In fact, this 
entire paper is just an explanation of this one-line summary. 
There are several reasons why this result might appeal. 

• Arrows have been introduced by Hughes [11,19] in the context of functional 
programming, to the rather applied end of fitting certain parsers into a 
general interface (see [10] for more applications). The notion comes without 
much motivation, and looks somewhat arbitrary. It is then reassuring - 
and maybe even surprising — that this notion appears as very natural in a 
completely different (categorical) setting. 
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• Arrows are meant as extensions of Monads — which are well-established 
in functional programming [18,30]. Indeed, for a monad M, the mapping 
(X, Y) i— > M(Y) X is a well-known instance of an Arrow. But the intended 
analogy between Monads and Arrows has not yet been further substantiated. 

It is a standard category theory textbook result [17, VII. 3] that a monad 
is an example of a "monoid in a category", namely in a category C — ► C 
of endofunctors on a category C (see below for more details). Our main 
observation is that Arrows are also monoids, also in a category of functors, 
not of the form C -> C, but C op xC^ C. 

• When we make the minor change of considering monoids in categories of 
bifunctors C op x C — - > Sets — with Sets instead of C as codomain — we 
can establish a one-to-one correspondence with Freyd categories from [23]. 
Hence the monoid description gives a different view on the subject, namely 
one in which the emphasis lies on the fact that an Arrow is a mapping 
from both input and output types to a type of computations, with suitable 
composition operations. The perspective of Freyd categories puts more 
emphasis on the (slightly tricky) premonoidal aspects involved. 

After introducing Arrows in Section 2, their structure is analysed categor- 
ically in Section 3. It turns out that the elaboration of the main result does 
require some work. The most technical part is the construction of suitable 
monoidal (tensor) infrastructure in categories of functors C op xC^C, which 
is described in Subsection 3.2. This finally gives rise to our model of Arrows 
as monoids in Section 4. 

We start with a gradual introduction of the various notions involved. In 
doing so we assume a basic level of familiarity with categorical notions and 
techniques. 

Let us first recall that the Monad construct in functional programming 
languages corresponds directly with a strong monad in category theory [30]. 
To fix notation, we shortly recall that a monad on a category C consists 
of an endofunctor M : C — > C, a unit natural transformation rj: 1— >M, 
and a multiplication natural transformation fi : M 2 — > M satisfying familiar 
equations [17]. 

Usually, a monoid is described as a set M together with an associative bi- 
nary operation m : MxM — > M with a unit e e M. Category theory provides 
an abstract framework to work in different "universes" . A basic illustration of 
this abstraction is that the notion of monoid can also be formulated in an arbi- 
trary category with suitable structure: for instance a monoid in a category C 
with Cartesian products (x, 1) is an object M of C, together with morphisms 
m : M x M — > M and e : 1 — > M that make certain diagrams commute, corre- 
sponding to the monoid equations. The unit equations m(x, e) = x = m(e,x), 
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for instance, are: 



M x M 




M 



M x M 



M 



This formulation leads to monoids in universes of for instance topological 
spaces or dcpo's. The carrier M then has suitable structure, that is preserved 
by the operations. 

Even stronger, we do not even need Cartesian products (x,l) for this 
formulation: monoidal structure (tensors) (®, /) suffices, because we don't 
need productions or diagonals. Section VII. 3 of [17] lists several examples of 
familiar notions (such as groups and rings) that appear in this way as monoid 
in a category. 

One example is a monad (M, t], fi) on a category C. The category C —>■ C of 
endofunctors (functors from C to itself, with natural transformations between 
them) carries a rather trivial monoidal structure given by functor composition: 
F <S> G = F o G, with identity functor / as obvious unit. Indeed, a monad can 
be described as a pair of maps (M ® M) — M <— I satisfying (precisely) the 
monoid equations. A forteriori, a strong monad on C is (precisely) a monoid 
in the category of strong functors C — > C, with natural transformations that 
commute with strength. 

Likewise, we will argue that monoids in suitable subcategories of bifunctors 
C op xC->C model Arrows. The most technical part is the construction of a 
tensor in this category that has exponentiation as unit. In doing so we shall 
give a simplification of one of the Arrow operations (namely first) introduced 
by Hughes, see Proposition 3.4. 

Arrows have been studied categorically before: [26] use Freyd categories 
(from [23]) as models of Arrows. We shall elaborate on the relation with our 
work in Section 5. The occurrence of the name Freyd is also very appropri- 
ate in our setting, because we encounter several issues, like dinaturality and 
small completeness, on which he has worked [8,2,9]. Our view of Arrows as 
monoids also provides another approach to Freyd categories. Section 5 con- 
cludes by proving that both models, monoids and Freyd categories, coincide 
in the relevant case. 



2 Arrows in functional languages 

This section introduces Arrows and their use in functional programming lan- 
guages. We briefly consider monads first, since this construction from category 
theory historically paved the way for Arrows. 
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2. 1 Monads 

A major reason for the initial reluctance in the adoption of functional pro- 
gramming languages is the need to pass state data around explicitly, even 
through functions that do even not use it. Monadic programming [30] pro- 
vides an answer to this inconvenience. Through the use of a monad one can 
encapsulate the changes to the state data, the "side-effects" , without explicitly 
carrying states around. Monads can efficiently structure functional programs 
while improving genericity. This mechanism is even deemed important enough 
to be incorporated into Haskell syntax [21]. A monad in Haskell is defined as 
a type class: 

class Monad M where 
return : : X —> K X 
(»=) : : M X -> (X — > M F) ^ M F 

To ensure the desired behaviour, the programmer herself should prove certain 
monad laws about the operations return and >>=. These boil down to the 
axioms that M be a strong monad, in the categorical sense. 

In effect, monads are functional combinators. They enable the combina- 
tion of functions very generally, without many assumptions on the precise 
functions to combine. However, these restrictions are strict enough to exclude 
certain classes of libraries from implementation with a monadic interface, most 
notably efficient parser combinators [27,14]. 

2.2 Arrows 

Arrows [11,20] are even more general functional combinators, and can be seen 
as a generalisation of monads, as we will see in example 2.2. An Arrow in 
Haskell is a type constructor class of the form: 

class Arrow A where 

arr : : (X — > Y) —> k X Y 

(»>) k X Y -> A Y Z -> A X Z 

first :: A X Y -> A (X,Z) (Y,Z) 

Analogous to monads, an Arrow must furthermore satisfy the following arrow 



laws, the proof of which is up to the programmer: 

(a »> b) »> c = a »> (b »> c), (1) 

arr (g o /) = arr / »> arr g, (2) 

arr id a = a = a ^>> arr id, (3) 

first a ^> arr m = arr m ^> a, (4) 

first a ^$>> arr (id x /) = arr (id x /) >^ first a, (5) 

first a arr a = arr a ^$>> first (first a), (6) 

first (arr /) = arr (/ x id), (7) 

first (a >^ b) = first a >^ first b, (8) 
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In these equations we use: 

Xi^^Xi x X 2 ^^X 2 , X x (Y x Z)^^(X xY)x Z, 

for the familiar product maps fst, snd and assoc. Also, arr (id x /) is 
sometimes written as second (arr /), where 

second a = arr 7 ^>> first a ^> arr 7, 

and *y : X x Y ^>-Y x X is the well-known swap- map. 

Throughout this article we use a, b, c for arrows, /, g for functions, and 
X, Y, Z for types, wherever possible. 

The arrow laws might appear arbitrary, and [11] does not derive them 
systematically. However, we shall show they are quite natural from a suitable 
categorical perspective. 

It turns out that the Arrow interface is general enough to allow most 
known libraries that are incompatible with a monadic interface. Applications 
can be found on the website [10], for example in the aforementioned parser 
combinators, in reactive programming [15] and in user interfaces [6]. 

Example 2.1 (Pure functions) The first example of Arrows that comes to 
mind is, naturally, ordinary functions. In Haskell this is written as follows. 

instance Arrow (— 0 where 
arr / = / 

/ »> g = g o / 
first f = f x id 

One sees at a glance that this satisfies the arrow laws (l)-(8). 

To distinguish between normal functions and functions as Arrows, we also 
call the former pure functions. 

Example 2.2 (Kleisli Arrows from monads) In category theory, given a 
monad one can construct the Kleisli category of free algebras. Likewise, given 
a monad in a functional programming language, we can cast it as an Arrow. 
This standard example of an Arrow is already present in [11]. 

newtype Kleisli VI X Y = K (X ^MF) 

instance Monad M =>- Arrow (Kleisli M) where 
arr / = K (return o /) 
K / »> K g = K (XX. f X »= g) 

first (K /) = K (X(X,Z).f X »= XY. return (Y,Z)) 

The arrow laws (l)-(8) (for K) follow readily from the monad laws (for M). 
Intuitively we can think of a Kleisli Arrow as a computation that allows for 
monadic behaviour in its codomain (i.e. in its output). 

5 



Heunen, Jacobs 



Further examples of Arrows will appear in Section 4, in categorical lan- 
guage. 

3 Analysing Arrows 

In this section we shall formulate several results to make the underlying cate- 
gorical structure of Arrows in Haskell explicit. We also provide an alternative 
for the 'first' operations in terms of what we call 'internal strength' (in Propo- 
sition 3.4). The main outcome of this section is a reformulation of an Arrow 
as a monoid. 

We fix a category T with types as objects and terms as morphisms, such as 
for example the category Hask of Haskell types and functions. We assume that 
T is Cartesian closed, and carries a binary operation A(—, — ) on objects/types 
that satisfies the arrow laws (l)-(8) for given collections of maps arr, y>>> and 
first. We shall identify the categorical structure involved in a series of results. 

Lemma 3.1 The operation A(—, — ) extends to a functor T op x T — > T, with 
action on maps f : X' — > X and g: Y — > Y' given by: 

A{f,g) d = Xh. arr(f) »> h »> arr(g) : A(X, Y) -> A(X', Y'). 
This functor is strong in its second argument, and costrong in its first, via 

st 2 = X(z, h). arr(Xx. (z,x)) y?>> second(h) 
: Z x A(X,Y) -> A(X,Z x Y), 
cost 2 = X(z, h). arr(Xf. f(z)) h 

: Z x A{X,Y) -> A(X Z ,Y). 

Proof. It is easy to check that A preserves identities and composition, and 
also that the strength and costrength maps are natural. These maps further- 
more satisfy the following equations, which will come in useful: 

v4(id,7T 2 ) O St 2 = 7T 2 , 

A (id, at) o st 2 o (id x st 2 ) = st 2 o a, 

cost 2 o Xh. (z, h) = A(Xf. f(z), id), 
A(P, id) o cost 2 o (id x cost 2 ) = cost 2 o a, 

where (3: X^ ¥xZ ' ) -^->(X Y ) Z is the familiar canonical isomorphism. □ 

Notice that we could just as well have used sti = A(id, 7) o st 2 o 7 : 
A(X,Y) x Z —>■ A(X,Y x Z), which then satisfies similar equations, like 

71*1 = Sti O A(id, 7Ti). 
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Lemma 3.2 The maps arr: Y x — > A(X,Y) form a natural transformation 
(+)(~) —> A(— , +) from exponents to arrows. 

Similarly, the maps first: A(X, Y) — > A(X x Z,Y x Z) are natural in X, Y . 
This may be formulated as: first yields a natural transformation (first) from 
A to the functor Ax given by (X, Y) ^ ]\ z A(X x Z,Y x Z). 

Proof. This follows from easy calculations: for maps / : X' — > X, g : Y — ► Y 1 
in T and h: Y x we have: 

(A(f,g) o arr) (ft) = arr(/) y>>> arr(ft) arr(g) 

= arr(g o h o f) 
= arr (g^ (ft)) 
= (arr o g*\ (ft), 



and 



(Ax (f,g) o (first))(ft) = (A(f x id,g x id) o 7r z ) z ((first(ft))) 

= <A(/xid,0Xid)(first(/O)) 

= (arr(/ x id) >^ first (/i) >^ arr(g x id)) 



(first (arr (/)) »> first (ft) »> first (arr (g))) 



(8) 

= (first (arr (/) »> ft »> arr(#))) 
= (first(A(/,^)(ft))) 

= ((first) oA(/ )3 )) (ft). □ 

Lemma 3.3 The maps ^>: A(X,P) x A(P, Y) — > A(X,Y) are natural in 
X,Y, and dinatural in P. The latter means (see [17, IX. 4] or [2]) that for 
each map f : P — > Q the following diagram commutes. 



idxA(/,]d) 

A(X,P) x A(Q,Y) 

A(id,/)xTc 



A(X,P) x A(P,Y)^^A(X,Y) 

^^A(X,Y) 
~A(X,Q) x A(Q,Y)^A(X,Yf^ 

Proof. We shall only do dinaturality: for a : A(X,P) and b : A(Q,Y), 

(»> o id x A(/,id))(a,6) = a »> id) (6) 

= a »> arr(/) »> b 
= A(id,f)(a) »>6 
= (»> o A(id,/) x id) (a, b). 



□ 



Intuitively, dinaturality in P signifies that this middle parameter 'is not 
really important'; it could just have well been another one, as long as it is the 
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same across the second argument of the first factor, and the first argument of 
the second. This suggests that ^>^> should really be seen as an operation from 
a tensor product. This will be elaborated in Section 3.2. 

3. 1 The operation first 

We now prove that the maps 'first' satisfying (4)-(8) can be simplified into 
maps called 'ist', for internal strength. 

Proposition 3.4 The maps first: A{X,Y) — > A(X x Z,Y x Z) satisfying 
equations (4) -(8) correspond to "internal strength" maps ist: A(X,Y) — > 
A(X, Y x X) which are natural in Y and dinatural in X, and satisfy 

ist(arr(f)) = arr({f, id)), (9) 

ist(a) y>>> arr{jti) = a, (10) 

ist(a »> b) = ist(a) »> ist{arr(irx) »> b) »> arr(id x ir 2 ), (11) 

ist(ist(a)) = ist(a) y>>> arr( (id, vr 2 )). (12) 

The alternative formulation in terms of internal strength 'ist' in this result 
is convenient because it has only two parameters - instead of three for 'first' 
- and its (di)naturality is clearly described. The proof of the equivalence of 
'first' and 'ist' involves many basic calculations, of which we only present a 
few exemplaric cases. 

Proof. Given the maps 'first' satisfying (4)-(8), we define internal strength 
on a : A(X, Y) as: 

ist (a) = arr(A) ^$>> first (a), 

where A = (id, id). One then checks naturality in Y, dinaturality in X, 
and (9)-(12). The (di) naturality equations can be formulated as: 

ist (a) ^$>> arr(g x id) = ist (a ^$>> arr(g)) (13) 
arr(/) »> ist (a) = ist(arr(/) »> a) »> arr(id x /). (14) 

As illustration we check equation (10): 

ist (a) y>$> arr(7T!) = arr(A) yz>> first (a) arr(7rx) 
= arr(A) y>>> arr(7T!) a 

( 2 ) 

= arr(-7Ti o A) yz>> a 
= arr(id) ^> a 

(3) 

= a. 

Conversely, given internal strength 'ist' satisfying (9)-(12), we define: 

first (a) = ist(arr(7Ti) y>i> a) yzz> arr(id x 7r 2 ), 
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where n 1 : X x Z — > X and id x 7r 2 : Y x (X x Z) — > K x Z. This yields a 
natural operation, in the sense that: 

arr(/ x id) y>z> first(a) >^ arr(g x id) = first(/ >^ a ^> g). 

We shall prove equation (8) in detail, and leave the rest to the interested 
reader. 

first a 5SS> first b 

= ist(arr(-7Ti) ^$>> a) >^ arr(id x 7r 2 ) >^ ist(arr(-7ri) >^>> b) 
^$>>arr(id x 7r 2 ) 

(dmat) jg^gjj.^j a ^ ist(arr(id x 7r 2 ) ^> arr(7Ti) ^> b) 
^>»arr(id x (id x ir 2 )) arr(id x 7r 2 ) 
ist(arr(7Ti) y>>> a) y?>> ist(arr(7Ti) y>>> b) 

^$>>arr(id x 7r 2 ) ^$>> arr(id x 7r 2 ) 
ist(arr(7Ti) ^$>> a >^ 6) arr(id x 7r 2 ) 

first (a y>$> b). □ 



(2) 



(11) 



3.2 Monoidal structure 

Recall from the introduction that describing an Arrow (A, arr, as a monoid 
in a category of bifunctors C op xC^C requires a monoidal structure ((g), 7) 
on such bifunctors, so that the Arrow A appears as monoid of the form: 

A®A^^A^^I 

The naturality arr: (+)^ — * A observed in lemma 3.2 suggests to take expo- 
nentiation as unit I = of the intended monoidal structure. The big 
question then is: what is (g>? 

We now sketch the main idea, still in the category T of types and terms. 
Composition ^>> is given by a collection of maps: 

A(X,P) x A{P,Y) ^ — *-A(X,Y) 

which can be combined by a coproduct on the left-hand-side: 

]J A(X, P) x A(P, Y) J A(X, Y) 

^PeT / 

This is a coproduct over all objects/types in T, and thus size aspects become 
relevant. But such coproducts (or sums) can be taken in polymorphic type 
theories, so for the time being we simply proceed and postpone issues of size 
until the next section. 
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Once we have this (big) coproduct, it becomes "natural" to take the dinat- 
urality observed in lemma 3.3 into account. This is done by using a suitable 
coequaliser c to form the required tensor g) as in: 

H A(X, P 1 ) x Pf 1 x A(P 2 , V) ) it ( II MX, P) x A(P, Y) ) >A(X, Y) 

,P 2 eT / d2 \P 6 T / A 



(A g) A)(X, Y) 

The composition map yz>> then appears as a map {A® A) — > A by construction. 
The two maps di, d 2 capture dinaturality via the composites: 

A(X,P{) x P 2 Pl A{X,P, x p p 1} ^evg^ A (X,P 2 ), 

P* x A(P 2 , Y) c ° st2 > A(P 2 ^ Pl) , y) A(A(eV ° 7) ' id) - A(P U Y). 

in which strength and costrength play a crucial role. 

Let us make sure that exponentiation / = (— p~> is indeed a unit for this 

tensor. We concentrate on the required isomorphism p : A ^ A ® I. It is 
obtained for each pair X, Y of objects as a composite 



A(X, Y) Aa -^^)> ]J A{X, P) x Y p \ -^(A ® Y), 

\P6T / 

where Ky is the F-injection into the coproduct. The inverse of p is obtained 

c - *- (A ® /) (X, Y) 



in: 



d 2 



U P) x Y p j 

vP6T / 



A(x,y) 



where e is the cotuple of maps P)x7 p ^ P x F p ) -> F) 
given as A(id,ev o 7) o sti. One can then check that p and p~ x are indeed 
each other's inverses. 

Finally, we have to check that the monoid equations hold for the span 
(A ® A) A I. We shall do one of the equations, namely 
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which for a: A(X,Y) becomes 

a i >■ (a, id) i >■ (a, arr(id)) 

T 

a ^> arr(id). 

Hence commutation of this diagram amounts to arrow law (3), which states 
a y>>> arr(id) = a. 

Likewise, the associativity isomorphism a : (A <g> B) eg) C — > A cg> (B <g> C) 
is given by associativity (A x 5) x C — > A x (B x C) via the coproduct. 
The required coherence properties, like a o a = (id ® a) o a o (a <8> id), are 
proven by using the arrow laws, notably (6). Strength, costrength en internal 
strength on A ® A are inherited from A, again via the coproduct and the 
equaliser. 

Summarising, in a type theoretic setting we have sketched that an Arrow 
is the same thing as a monoid in the category of bifunctors T op xT->T with 
strength, costrength, and internal strength. 

4 Arrows, categorically 

In the previous section we have reformulated an Arrow A in Haskell as a 
monoid A ® A — > A J in a category of bifunctors acting on types and 
terms. The most complicated ingredient was the tensor product ®. It was 
constructed like the tensor product of profunctors (or distributors) generalising 
relation composition [16], see also [4]. 

One other complication involves size. The big coproduct in the previous 
section uses all objects of the category T as indices. This requires T to be both 
small and (co) complete. At this stage it is important to recall the basic result 
of Freyd [8, Chapter 3, Exercise D] that there are no categories that are both 
small and complete, except preorders (see also [13, 8.3.2]). However, small 
complete internal categories do exist [12], and can indeed be used as models 
for polymorphic type theory. Working in such a universe is very similar to 
working in a polymorphic type theory as we have done in the previous section. 

Thus it becomes natural to consider the more general setting of bifunctors 
C op xC-»B, where C is IB-enriched, so that size issues are separated. So 
far we have considered B = C, for C Cartesian closed (and thus enriched 
over itself). Another obvious case is to take B = Sets and C small. The 
situation then reduces to profunctors, the monoidal structure of which is well- 
known, see [4, Section 7.8] or [22, Section 6.5]. In the remainder of this 
paper we shall focus on this (profunctor) situation, and take the following as 
categorical formalisation of the notion of Arrow, as originally formulated [11] 
in the language of Haskell. 

Definition 4.1 Let C be a small category. An Arrow over C is a monoid in 
the category of profunctors C op xC -> Sets, with its usual monoidal structure, 
that carry an internal strength. , 
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The restriction to small categories is maybe a bit too strong. It is needed 
to construct the usual tensor <S>, via a big coproduct over objects of C in 
the category Sets, like in the previous section. We can also formulate the 
composition operation ^>> of an Arrow A via collections of maps A(X, P) x 
A(P, Y) — ► A(X, Y) — which are natural in X, Y and dinatural in P — and 
satisfy the equations (l)-(8). In this manner we can relax the restriction to 
locally small categories. 

In the remainder of this section we shall sketch how to understand the 
earlier examples 2.1 and 2.2 in this setting, and extend them a bit. We therefor 
fix a locally small category C. 

The Hom-bifunctor C op x C -> Sets given by (X, Y) i-> Hom c (X,F) is 
perhaps the most obvious example of an Arrow — like the pure functions of 
example 2.1. 

If M : C — > C is a strong monad, then the mapping (X, Y) \— > Home (A, MY) 
is also an Arrow — namely the Kleisli Arrow as described in example 2.2. 

That Kleisli Arrows have monadic behaviour in their codomain leads us 
to consider Arrows behaving monadically in their domain. In functional lan- 
guage: Kleisli Arrows take care of bookkeeping in the output, so why not 
build Arrows that take care of bookkeeping in the input [29,28]? Since an 
Arrow C op xC-> Sets is contravariant in its 'domain', we must start from 
a monad on C op . That is, if A is a comonad, then we obtain an Arrow via 
(X,Y) i — ► Rom c (NX,Y). 

Even more generally, as in [29], [24] or even [5], we can try to build Arrows 
behaving monadically in both their domain and codomain at once. Given 
a strong monad M, a comonad N, and a distributive law A : NM — > MN 
between them we obtain an Arrow A via A(X,Y) = Honic(iVX, MY). The 
unit of the monoid A is readily defined using the (co)units of M and N, 
and the internal strength ist : Rom c {NX,MY) -> Rom c {NX,M(Y x X)) 
is easily given by ist(/) = st^ o (e,f), where e is the counit of N. The 
distributive law is needed to give the multiplication/composition a y?>> b of 
a E Hom c (NX, MY) and b G Rom c (NY, MZ): 

NX N 2 X — - NMY - - MNY A "' - M 2 Z - ■ MZ. 
5 Arrows as Freyd categories 

One could question our approach to Arrows in the previous sections because of 
the oft-heard statement 'Arrows are Freyd categories" [19]: Freyd categories 
are claimed to already provide categorical semantics for Arrows. However, this 
claim has always remained very informal. We think our approach is closer to 
the original functional intuitions underlying Arrows in Haskell, because: 

• the description of Arrows as bifunctors emphasises that they are binary 
operations on types; 
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• the precise formulation of the premonoidal structure of Freyd categories is 
rather delicate, and distracts from the essence of the structure of Arrows: 
all this structure corresponds only to 'first'. 

But more interestingly, our alternative formalisation of Arrows as monoids 
makes it possible to give precise mathematical meaning to the statement "Ar- 
rows are Freyd categories". That is the aim of the current section. We shall 
compare this result with the situation for monads 2 . 

Let us first recall what a Freyd category is. Therefor we need the notion of 
a premonoidal category, which we intuitively think of as a monoidal category 
in which the tensor need not be a bifunctor, though it is functorial in each 
variable separately. 

Definition 5.1 A binoidal category is a category D, with for every object X 
two functors (-) x X : D -> D and X x (-) : D -> D such that X x Y = X x Y . 
Hence we write XKIY = XxY = XxY. A morphism / is called central if 
for each g, both: 

• (/ x id) o (id x g) — (id Xl g) o (/ « id), and 

• (id x /) o (g x id) = (jx id) o (id x /). 

For such a central / it makes sense to write f^g or g^f for these composites. 

Definition 5.2 A symmetric premonoidal category is a binoidal category D 
together with an object / G D and natural isomorphisms with central compo- 
nents a : (X M Y) H Z -> X H (Y H Z), A : 7 H X -> X, p : X H J -> A and 
7:AK1Y-^YK1A that obey the familiar coherence properties for monoidal 
categories. 

The non-bifunctoriality reflects the order of side-effects when we think of 
D as a category of 'computations'. When we include a category C of 'values', 
we arrive at the notion of a Freyd category [23,25,26]. 

Definition 5.3 A Freyd category consists of a symmetric premonoidal cate- 
gory D together with a category C with finite products, and an identity-on- 
objects functor J : C — > D that preserves all structure: J(X x Y) = X M Y, 
J(a) = a, J(A) = A, etc. A Freyd category C — > D is called (locally) small if 
the category D is (locally) small. 

The comparison between monoids and Freyd categories begins with the 
well-known (and easily seen) fact that the following are in one-to-one corre- 
spondence: 

• Monoids in the category of functors C — ► C, 

• Monads M on C, and 

• Identity-on-objects functors J : C — ► D that have a right adjoint, 
2 As suggested by John Power. 
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The functor J arises from M by the Kleisli construction, while J gives a monad 
M induced by the adjunction. 

This can be generalised to the following equivalence. 

Theorem 5.4 For a locally small category C with finite products, there is a 
one-to-one correspondence between 

(i) Arrows A over C, that is (cf. definition 4-l)> monoids A in the category 
of pro functors C op xC^ Set that are internally strong. 

(ii) Locally small Freyd categories C — > D. 

Proof. Suppose we are given a monoid A : C op xC^ Set with ^a>, arr, 
and ist, satisfying the by now familiar properties of an Arrow. Put D = 
C A , the "Kleisli category" of A, 3 with objects X e C and a e A(X, Y) 
as morphisms a : X — > Y. Then D is symmetric premonoidal by defining 
I = 1 G D and X Kl Y = X x Y. The premonoidal tensor Kl extends to a 
functor (on morphisms) by virtue of the provided ist (or equivalently first, 
see proposition 3.4, and second), since every morphism a e A(X,Y) yields 
amZ = first z (a) : XMZ ^Y^Z and ZMa = second z (a) : ZMX -> ZMY. 
The implication (i) =>- (ii) is completed by defining J : C — > D to act as the 
identity on objects, and as arr on morphisms. 

Conversely, suppose given a Freyd category J : C — > D. We then define 
A : C op x C -> Set by A(X,F) = Hom D (X,F). This A is made into a 
monoid in the category of profunctors C op x C — > Set by taking the unit 
arr = J : Homc(X, K) — > Homi}(X, K), and taking as multiplication ^>> the 
composition P) x A(P, Y) — > A(X, K) in D. Furthermore we can define 

is1*,y : A(X, Y) -> A(X, 7x1) by ist x , y (/) = (/ x X) o J((id, id)). 

Naturality of ist in Y is obvious, dinaturality in X boils down to the fact that 
the diagram 

Hom D (X, Y) 1 ^Hom D (X, 7x1) 
Hom D (X', Y) Hom D (X, Y x X') 



Hom D (X', Y) ^ Hom D (X', F x X') 



commutes for every morphism (7 : X — > X' in C. The crux here is that it need 
only commute for morphisms g of C, i.e. morphisms of D of the form J{g) 
(cf. equations (13) and (14)), which are central. Since one also readily checks 
(9)-(12), we see that (ii) implies (i). □ 

Another, similar, equivalence that comes to mind is that of 



The reason for calling the Kleisli category will be presented elsewhere. 
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• Monoids in the category of strong functors C — > C (and natural transfor- 
mations commuting with strength), 

• Strong monads on C, and 

• Freyd categories C — > D with a right adjoint. 

However, there seems to be no meaningful 'Arrow- analogue' of this correspon- 
dence, because Arrows are automatically (co)strong (cf. lemma 3.1). 

Conclusion and future work 

This paper contains two reformulations of the notion of Arrow, introduced 
in the context of functional programming by Hughes: one minor and one 
major. The minor reformulation concerns an easier alternative to the 'first' 
operation. The major reformulation is the description of an Arrow as a monoid 
in a category of bifunctors. 

We have used the latter reformulation to justify the informal claim that 
Arrows are Freyd categories. On Sets the two semantics, Freyd categories 
and internally strong monoids, coincide. However, the monoid approach gen- 
eralises in a different direction than the Freyd category approach. 

A (minor) topic left open is how the monoidal structure on the category 
of bifunctors C op xC^C relates to the monoidal structure on the category 
of functors C — > C. 

In the end the question comes up: does this help functional programmers 
in any way? At this stage we have no such claim. But one does notice sev- 
eral variations and extensions of Arrows appearing, such as Biarrows [1], or 
a need for recursion schemes, and thus the need for a foundation, of mon- 
ads/Arrows [7,3,19]. Our categorical reformulation as monoids might give 
guidance for the proper formulation of such variations. 
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